home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / MPW Related / DTS MPW Goodies / SetProject < prev    next >
Encoding:
Text File  |  1990-09-14  |  437 b   |  20 lines  |  [TEXT/MPS ]

  1. #
  2. # SetProject        Andrew Shebanow        3/14/89
  3. #
  4. #    Script to set current project.
  5. #
  6. #    Usage: SetProject ProjName
  7. #
  8.  
  9. Project "{ProjName}"
  10.  
  11. # Extract the CheckOutDir and change directory to it
  12. Set ChkOutDir "`CheckOutDir`"
  13. ( Evaluate "{ChkOutDir}" =~ /(∂')*CheckOutDir -project ≈∂∫(∂')* (∂')*(≈:)®1(∂')*/ ) ∑ Dev:Null
  14. Directory "{®1}"
  15.  
  16. # Execute project init script if present
  17. If "`Exists ProjInit`" != ""
  18.     Execute ProjInit ∑∑ "{WorkSheet}"
  19. End
  20.